(in-package :ccl)(pushnew (make-pathname :directory (pathname-directory (loading-file-source-file)))   *module-search-path* :test #'equalp)(require :ae-resolve-objects)(require :ae-core-suite)(require :ae-misc-suite)(require :defappleevents)(require :ae-recordable)(require :ae-text-suite)(defmethod application-resource-file ((app application))  (merge-pathnames "aete-for-mcl.rsrc" (loading-file-source-file)))